package com.ruoyi.system.service.impl;

import java.util.ArrayList;
import java.util.List;
import java.util.Objects;
import java.util.TimerTask;
import java.util.stream.Collectors;
import javax.validation.Validator;

import com.ruoyi.common.core.domain.entity.SysDept;
import com.ruoyi.common.integrate.domain.DeptUser;
import com.ruoyi.common.integrate.domain.User;
import com.ruoyi.common.integrate.service.QYWeiXinService;
import com.ruoyi.system.mapper.*;
import com.ruoyi.system.service.ISysDeptService;
import org.slf4j.Logger;
import org.slf4j.LoggerFactory;
import org.springframework.beans.factory.annotation.Autowired;
import org.springframework.mail.SimpleMailMessage;
import org.springframework.stereotype.Service;
import org.springframework.transaction.annotation.Transactional;
import org.springframework.util.CollectionUtils;
import com.ruoyi.common.annotation.DataScope;
import com.ruoyi.common.constant.UserConstants;
import com.ruoyi.common.core.domain.entity.SysRole;
import com.ruoyi.common.core.domain.entity.SysUser;
import com.ruoyi.common.exception.ServiceException;
import com.ruoyi.common.utils.SecurityUtils;
import com.ruoyi.common.utils.StringUtils;
import com.ruoyi.common.utils.bean.BeanValidators;
import com.ruoyi.common.utils.spring.SpringUtils;
import com.ruoyi.system.domain.SysPost;
import com.ruoyi.system.domain.SysUserPost;
import com.ruoyi.system.domain.SysUserRole;
import com.ruoyi.system.service.ISysConfigService;
import com.ruoyi.system.service.ISysUserService;

/**
 * 用户 业务层处理
 *
 * @author ruoyi
 */
@Service
public class SysUserServiceImpl implements ISysUserService {
    private static final Logger log = LoggerFactory.getLogger(SysUserServiceImpl.class);

    @Autowired
    private SysUserMapper userMapper;

    @Autowired
    private SysRoleMapper roleMapper;

    @Autowired
    private SysDeptMapper deptMapper;

    @Autowired
    private SysPostMapper postMapper;

    @Autowired
    private SysUserRoleMapper userRoleMapper;

    @Autowired
    private SysUserPostMapper userPostMapper;

    @Autowired
    private ISysConfigService configService;

    @Autowired
    protected Validator validator;

    @Autowired
    private QYWeiXinService qyWeiXinService;

    /**
     * 根据条件分页查询用户列表
     *
     * @param user 用户信息
     * @return 用户信息集合信息
     */
    @Override
    @DataScope(deptAlias = "d", userAlias = "u")
    public List<SysUser> selectUserList(SysUser user) {
        return userMapper.selectUserList(user);
    }

    /**
     * 根据条件分页查询已分配用户角色列表
     *
     * @param user 用户信息
     * @return 用户信息集合信息
     */
    @Override
    @DataScope(deptAlias = "d", userAlias = "u")
    public List<SysUser> selectAllocatedList(SysUser user) {
        return userMapper.selectAllocatedList(user);
    }

    /**
     * 根据条件分页查询未分配用户角色列表
     *
     * @param user 用户信息
     * @return 用户信息集合信息
     */
    @Override
    @DataScope(deptAlias = "d", userAlias = "u")
    public List<SysUser> selectUnallocatedList(SysUser user) {
        return userMapper.selectUnallocatedList(user);
    }

    /**
     * 通过用户名查询用户
     *
     * @param userName 用户名
     * @return 用户对象信息
     */
    @Override
    public SysUser selectUserByUserName(String userName) {
        return userMapper.selectUserByUserName(userName);
    }

    /**
     * 通过用户ID查询用户
     *
     * @param userId 用户ID
     * @return 用户对象信息
     */
    @Override
    public SysUser selectUserById(Long userId) {
        return userMapper.selectUserById(userId);
    }

    /**
     * 查询用户所属角色组
     *
     * @param userName 用户名
     * @return 结果
     */
    @Override
    public String selectUserRoleGroup(String userName) {
        List<SysRole> list = roleMapper.selectRolesByUserName(userName);
        if (CollectionUtils.isEmpty(list)) {
            return StringUtils.EMPTY;
        }
        return list.stream().map(SysRole::getRoleName).collect(Collectors.joining(","));
    }

    /**
     * 查询用户所属岗位组
     *
     * @param userName 用户名
     * @return 结果
     */
    @Override
    public String selectUserPostGroup(String userName) {
        List<SysPost> list = postMapper.selectPostsByUserName(userName);
        if (CollectionUtils.isEmpty(list)) {
            return StringUtils.EMPTY;
        }
        return list.stream().map(SysPost::getPostName).collect(Collectors.joining(","));
    }

    /**
     * 校验用户名称是否唯一
     *
     * @param userName 用户名称
     * @return 结果
     */
    @Override
    public String checkUserNameUnique(String userName) {
        int count = userMapper.checkUserNameUnique(userName);
        if (count > 0) {
            return UserConstants.NOT_UNIQUE;
        }
        return UserConstants.UNIQUE;
    }

    /**
     * 校验手机号码是否唯一
     *
     * @param user 用户信息
     * @return
     */
    @Override
    public String checkPhoneUnique(SysUser user) {
        Long userId = StringUtils.isNull(user.getUserId()) ? -1L : user.getUserId();
        SysUser info = userMapper.checkPhoneUnique(user.getPhonenumber());
        if (StringUtils.isNotNull(info) && info.getUserId().longValue() != userId.longValue()) {
            return UserConstants.NOT_UNIQUE;
        }
        return UserConstants.UNIQUE;
    }

    /**
     * 校验email是否唯一
     *
     * @param user 用户信息
     * @return
     */
    @Override
    public String checkEmailUnique(SysUser user) {
        Long userId = StringUtils.isNull(user.getUserId()) ? -1L : user.getUserId();
        SysUser info = userMapper.checkEmailUnique(user.getEmail());
        if (StringUtils.isNotNull(info) && info.getUserId().longValue() != userId.longValue()) {
            return UserConstants.NOT_UNIQUE;
        }
        return UserConstants.UNIQUE;
    }

    /**
     * 校验用户是否允许操作
     *
     * @param user 用户信息
     */
    @Override
    public void checkUserAllowed(SysUser user) {
        if (StringUtils.isNotNull(user.getUserId()) && user.isAdmin()) {
            throw new ServiceException("不允许操作超级管理员用户");
        }
    }

    /**
     * 校验用户是否有数据权限
     *
     * @param userId 用户id
     */
    @Override
    public void checkUserDataScope(Long userId) {
        if (!SysUser.isAdmin(SecurityUtils.getUserId())) {
            SysUser user = new SysUser();
            user.setUserId(userId);
            List<SysUser> users = SpringUtils.getAopProxy(this).selectUserList(user);
            if (StringUtils.isEmpty(users)) {
                throw new ServiceException("没有权限访问用户数据！");
            }
        }
    }

    /**
     * 获取企业微信部门成员详情，并更新人员、岗位信息
     */
    @Transactional
    @Override
    public String syncQYWeiXinUserData() {
        int successNum = 0;
        int failureNum = 0;
        StringBuilder successMsg = new StringBuilder();
        StringBuilder failureMsg = new StringBuilder();

        // 当前操作用户
        String currentUserName = SecurityUtils.getLoginUser().getUsername();

        // 获取系统所有的用户
        List<SysUser> sysUserList = selectUserAll();
        // 获取系统所有的部门
        List<SysDept> sysDeptList = deptMapper.selectDeptAll();
        // 获取系统所有的岗位
        List<SysPost> sysPostList = postMapper.selectPostList(null);
        // 获取系统所有的用户岗位信息
        List<SysUserPost> sysUserPostList = userPostMapper.selectAll();
        // 所有的部门的id
        List<Long> deptIds = sysDeptList.stream().map(SysDept::getDeptId).collect(Collectors.toList());

        try{
            // 微信所有部门成员详情
            List<DeptUser> allDeptUserList = new ArrayList<>();
            // 获取企业微信部门成员详情
            deptIds.forEach(deptId -> {
                List<DeptUser> deptUserList = qyWeiXinService.getDeptUserByQYWeiXin(deptId.toString());
                if (Objects.nonNull(deptUserList) && deptUserList.size() > 0)
                    allDeptUserList.addAll(deptUserList);
            });
            // 企业微信所有用户userid
            List<String> allWXUserIds = allDeptUserList.stream().map(e -> e.getUserid()).collect(Collectors.toList());

            // 重复的用户（系统已存在的用户信息）--- 做修改操作
            List<SysUser> updateUserList = sysUserList.stream().filter(e -> allWXUserIds.contains(e.getUserName())).collect(Collectors.toList());
            // 重复的用户
            List<String> bothUsernames = updateUserList.stream().map(SysUser::getUserName).collect(Collectors.toList());
            log.info("======================== 同步 企业微信用户数据 ========================");
            log.info("更新条数: " + bothUsernames.size());
            // 已存在的用户 更新操作
            for (SysUser sysUser : updateUserList) {
                DeptUser wxUser = allDeptUserList.stream().filter(a -> a.getUserid().equals(sysUser.getUserName())).findFirst().orElse(null);//如果没有，则返回null
                if (Objects.nonNull(wxUser)) {
                    // 用户
                    sysUser.setNickName(wxUser.getName());
                    sysUser.setPhonenumber(wxUser.getMobile());
                    sysUser.setSex(wxUser.getGender());
                    sysUser.setEmail(wxUser.getEmail());
                    Integer deptId = wxUser.getDepartment().stream().findFirst().orElse(null);
                    if (Objects.nonNull(deptId)) {
                        sysUser.setDeptId(Long.parseLong(deptId.toString()));
                    }
                    sysUser.setUpdateBy(currentUserName);
                    // 更新用户
                    userMapper.updateUser(sysUser);

                    // 如果企业微信中 没有该人员职位，则不加
                    if (StringUtils.isNotEmpty(wxUser.getPosition())) {
                        // 新增职位
                        SysPost sysPost = sysPostList.stream().filter(p -> p.getPostName().equals(wxUser.getPosition())).findFirst().orElse(null);
                        // 查询用户职位关联
                        SysUserPost sysUserPost = sysUserPostList.stream().filter(a -> a.getUserId().equals(sysUser.getUserId())).findFirst().orElse(null);
                        // 新增职位
                        SysPost insertPost = new SysPost();
                        if (Objects.isNull(sysPost)) {
                            insertPost.setPostName(wxUser.getPosition());
                            insertPost.setStatus("0");
                            insertPost.setCreateBy(currentUserName);
                            postMapper.insertPost(insertPost);
                        } else {
                            insertPost = sysPost;
                        }

                        // 查询用户职位关联
                        if (Objects.isNull(sysUserPost)) {
                            SysUserPost insertUserPost = new SysUserPost(sysUser.getUserId(), insertPost.getPostId());
                            userPostMapper.insert(insertUserPost);
                        } else {
                            sysUserPost.setPostId(insertPost.getPostId());
                            userPostMapper.update(sysUserPost);
                        }
                    }
                }

                // 同步打印信息
                successNum ++;
                successMsg.append("<br/>" + successNum + "、用户 " + sysUser.getUserName() + " 更新成功");
            }

            // 新增的用户
            List<DeptUser> addList = allDeptUserList.stream().filter(e -> !bothUsernames.contains(e.getUserid())).collect(Collectors.toList());
            log.info("新增条数: " + addList.size());
            // 未存在的用户 新增操作
            for (DeptUser deptUser : addList) {
                SysUser addSysUser = new SysUser();
                addSysUser.setUserName(deptUser.getUserid());
                addSysUser.setNickName(deptUser.getName());
                addSysUser.setPhonenumber(deptUser.getMobile());
                addSysUser.setSex(deptUser.getGender());
                addSysUser.setEmail(deptUser.getEmail());

                Integer deptId = deptUser.getDepartment().stream().findFirst().orElse(null);
                if (Objects.nonNull(deptId)) {
                    addSysUser.setDeptId(Long.parseLong(deptId.toString()));
                }
                addSysUser.setPassword(SecurityUtils.encryptPassword("123456"));
                addSysUser.setCreateBy(currentUserName);
                userMapper.insertUser(addSysUser);

                // 如果企业微信中 没有该人员职位，则不加
                if (StringUtils.isNotEmpty(deptUser.getPosition())) {
                    // 职位
                    SysPost sysPost = sysPostList.stream().filter(p -> p.getPostName().equals(deptUser.getPosition())).findFirst().orElse(null);   // 新增职位
                    SysPost insertPost = new SysPost();
                    if (Objects.isNull(sysPost)) {
                        insertPost.setPostName(deptUser.getPosition());
                        insertPost.setStatus("0");
                        insertPost.setCreateBy(currentUserName);
                        postMapper.insertPost(insertPost);
                    } else {
                        insertPost = sysPost;
                    }

                    // 用户职位关联
                    SysUserPost insertUserPost = new SysUserPost(addSysUser.getUserId(), insertPost.getPostId());
                    userPostMapper.insert(insertUserPost);
                }

                // 同步打印信息
                successNum ++;
                successMsg.append("<br/>" + successNum + "、用户 " + addSysUser.getUserName() + " 新增成功");
            }
        }catch (Exception e) {
            failureNum++;
            String msg = "<br/> 同步失败：";
            failureMsg.append(msg + e.getMessage());
            log.error(msg, e);
        }

        if (failureNum > 0) {
            failureMsg.insert(0, "很抱歉，导入失败！错误如下：");
            throw new ServiceException(failureMsg.toString());
        } else {
            successMsg.insert(0, "恭喜您，数据已全部同步成功！共 " + successNum + " 条，数据如下：");
        }
        return successMsg.toString();
    }

    /**
     * 新增保存用户信息
     *
     * @param user 用户信息
     * @return 结果
     */
    @Override
    @Transactional
    public int insertUser(SysUser user) {
        // 新增用户信息
        int rows = userMapper.insertUser(user);
        // 新增用户岗位关联
        insertUserPost(user);
        // 新增用户与角色管理
        insertUserRole(user);
        return rows;
    }

    /**
     * 注册用户信息
     *
     * @param user 用户信息
     * @return 结果
     */
    @Override
    public boolean registerUser(SysUser user) {
        return userMapper.insertUser(user) > 0;
    }

    /**
     * 修改保存用户信息
     *
     * @param user 用户信息
     * @return 结果
     */
    @Override
    @Transactional
    public int updateUser(SysUser user) {
        Long userId = user.getUserId();
        // 删除用户与角色关联
        userRoleMapper.deleteUserRoleByUserId(userId);
        // 新增用户与角色管理
        insertUserRole(user);
        // 删除用户与岗位关联
        userPostMapper.deleteUserPostByUserId(userId);
        // 新增用户与岗位管理
        insertUserPost(user);
        return userMapper.updateUser(user);
    }

    /**
     * 用户授权角色
     *
     * @param userId  用户ID
     * @param roleIds 角色组
     */
    @Override
    @Transactional
    public void insertUserAuth(Long userId, Long[] roleIds) {
        userRoleMapper.deleteUserRoleByUserId(userId);
        insertUserRole(userId, roleIds);
    }

    /**
     * 修改用户状态
     *
     * @param user 用户信息
     * @return 结果
     */
    @Override
    public int updateUserStatus(SysUser user) {
        return userMapper.updateUser(user);
    }

    /**
     * 修改用户基本信息
     *
     * @param user 用户信息
     * @return 结果
     */
    @Override
    public int updateUserProfile(SysUser user) {
        return userMapper.updateUser(user);
    }

    /**
     * 修改用户头像
     *
     * @param userName 用户名
     * @param avatar   头像地址
     * @return 结果
     */
    @Override
    public boolean updateUserAvatar(String userName, String avatar) {
        return userMapper.updateUserAvatar(userName, avatar) > 0;
    }

    /**
     * 重置用户密码
     *
     * @param user 用户信息
     * @return 结果
     */
    @Override
    public int resetPwd(SysUser user) {
        return userMapper.updateUser(user);
    }

    /**
     * 重置用户密码
     *
     * @param userName  用户名
     * @param password  密码
     * @param cleartext 明文密码
     * @return 结果
     */
    @Override
    public int resetUserPwd(String userName, String password, String cleartext) {
        return userMapper.resetUserPwd(userName, password, cleartext);
    }

    /**
     * 新增用户角色信息
     *
     * @param user 用户对象
     */
    public void insertUserRole(SysUser user) {
        Long[] roles = user.getRoleIds();
        if (StringUtils.isNotNull(roles)) {
            // 新增用户与角色管理
            List<SysUserRole> list = new ArrayList<SysUserRole>();
            for (Long roleId : roles) {
                SysUserRole ur = new SysUserRole();
                ur.setUserId(user.getUserId());
                ur.setRoleId(roleId);
                list.add(ur);
            }
            if (list.size() > 0) {
                userRoleMapper.batchUserRole(list);
            }
        }
    }

    /**
     * 新增用户岗位信息
     *
     * @param user 用户对象
     */
    public void insertUserPost(SysUser user) {
        Long[] posts = user.getPostIds();
        if (StringUtils.isNotNull(posts)) {
            // 新增用户与岗位管理
            List<SysUserPost> list = new ArrayList<SysUserPost>();
            for (Long postId : posts) {
                SysUserPost up = new SysUserPost();
                up.setUserId(user.getUserId());
                up.setPostId(postId);
                list.add(up);
            }
            if (list.size() > 0) {
                userPostMapper.batchUserPost(list);
            }
        }
    }

    /**
     * 新增用户角色信息
     *
     * @param userId  用户ID
     * @param roleIds 角色组
     */
    public void insertUserRole(Long userId, Long[] roleIds) {
        if (StringUtils.isNotNull(roleIds)) {
            // 新增用户与角色管理
            List<SysUserRole> list = new ArrayList<SysUserRole>();
            for (Long roleId : roleIds) {
                SysUserRole ur = new SysUserRole();
                ur.setUserId(userId);
                ur.setRoleId(roleId);
                list.add(ur);
            }
            if (list.size() > 0) {
                userRoleMapper.batchUserRole(list);
            }
        }
    }

    /**
     * 通过用户ID删除用户
     *
     * @param userId 用户ID
     * @return 结果
     */
    @Override
    @Transactional
    public int deleteUserById(Long userId) {
        // 删除用户与角色关联
        userRoleMapper.deleteUserRoleByUserId(userId);
        // 删除用户与岗位表
        userPostMapper.deleteUserPostByUserId(userId);
        return userMapper.deleteUserById(userId);
    }

    /**
     * 批量删除用户信息
     *
     * @param userIds 需要删除的用户ID
     * @return 结果
     */
    @Override
    @Transactional
    public int deleteUserByIds(Long[] userIds) {
        for (Long userId : userIds) {
            checkUserAllowed(new SysUser(userId));
            checkUserDataScope(userId);
        }
        // 删除用户与角色关联
        userRoleMapper.deleteUserRole(userIds);
        // 删除用户与岗位关联
        userPostMapper.deleteUserPost(userIds);
        return userMapper.deleteUserByIds(userIds);
    }

    /**
     * 导入用户数据
     *
     * @param userList        用户数据列表
     * @param isUpdateSupport 是否更新支持，如果已存在，则进行更新数据
     * @param operName        操作用户
     * @return 结果
     */
    @Override
    public String importUser(List<SysUser> userList, Boolean isUpdateSupport, String operName) {
        if (StringUtils.isNull(userList) || userList.size() == 0) {
            throw new ServiceException("导入用户数据不能为空！");
        }
        int successNum = 0;
        int failureNum = 0;
        StringBuilder successMsg = new StringBuilder();
        StringBuilder failureMsg = new StringBuilder();
        String password = configService.selectConfigByKey("sys.user.initPassword");
        for (SysUser user : userList) {
            try {
                // 验证是否存在这个用户
                SysUser u = userMapper.selectUserByUserName(user.getUserName());
                if (StringUtils.isNull(u)) {
                    BeanValidators.validateWithException(validator, user);
                    user.setPassword(SecurityUtils.encryptPassword(password));
                    user.setCreateBy(operName);
                    this.insertUser(user);
                    successNum++;
                    successMsg.append("<br/>" + successNum + "、账号 " + user.getUserName() + " 导入成功");
                } else if (isUpdateSupport) {
                    BeanValidators.validateWithException(validator, user);
                    user.setUpdateBy(operName);
                    this.updateUser(user);
                    successNum++;
                    successMsg.append("<br/>" + successNum + "、账号 " + user.getUserName() + " 更新成功");
                } else {
                    failureNum++;
                    failureMsg.append("<br/>" + failureNum + "、账号 " + user.getUserName() + " 已存在");
                }
            } catch (Exception e) {
                failureNum++;
                String msg = "<br/>" + failureNum + "、账号 " + user.getUserName() + " 导入失败：";
                failureMsg.append(msg + e.getMessage());
                log.error(msg, e);
            }
        }
        if (failureNum > 0) {
            failureMsg.insert(0, "很抱歉，导入失败！共 " + failureNum + " 条数据格式不正确，错误如下：");
            throw new ServiceException(failureMsg.toString());
        } else {
            successMsg.insert(0, "恭喜您，数据已全部导入成功！共 " + successNum + " 条，数据如下：");
        }
        return successMsg.toString();
    }

    /**
     * 查询所有用户
     *
     * @return 用户列表
     */
    @Override
    public List<SysUser> selectUserAll() {
        return userMapper.selectUserAll();
    }

    /**
     * 获取用户明文密码
     *
     * @return 用户明文密码
     */
    @Override
    public String getCleartextPassword(String username) {
        return userMapper.getCleartextPassword(username);
    }
}
